(************** Content-type: application/mathematica **************
                     CreatedBy='Mathematica 5.0'

                    Mathematica-Compatible Notebook

This notebook can be used with any Mathematica-compatible
application, such as Mathematica, MathReader or Publicon. The data
for the notebook starts with the line containing stars above.

To get the notebook into a Mathematica-compatible application, do
one of the following:

* Save the data starting with the line of stars above into a file
  with a name ending in .nb, then open the file inside the
  application;

* Copy the data starting with the line of stars above to the
  clipboard, then use the Paste menu command inside the application.

Data for notebooks contains only printable 7-bit ASCII and can be
sent directly in email or through ftp in text mode.  Newlines can be
CR, LF or CRLF (Unix, Macintosh or MS-DOS style).

NOTE: If you modify the data for this notebook not in a Mathematica-
compatible application, you must delete the line below containing
the word CacheID, otherwise Mathematica-compatible applications may
try to use invalid cache data.

For more information on notebooks and Mathematica-compatible 
applications, contact Wolfram Research:
  web: http://www.wolfram.com
  email: info@wolfram.com
  phone: +1-217-398-0700 (U.S.)

Notebook reader applications are available free of charge from 
Wolfram Research.
*******************************************************************)

(*CacheID: 232*)


(*NotebookFileLineBreakTest
NotebookFileLineBreakTest*)
(*NotebookOptionsPosition[     36506,        666]*)
(*NotebookOutlinePosition[     37170,        689]*)
(*  CellTagsIndexPosition[     37126,        685]*)
(*WindowFrame->Normal*)



Notebook[{

Cell[CellGroupData[{
Cell[BoxData[{
    \(b = {bx, by}\), "\[IndentingNewLine]", 
    \(bn = b . {{0, 1}, {\(-1\), 0}}\)}], "Input"],

Cell[BoxData[
    \({bx, by, 0}\)], "Output"],

Cell[BoxData[
    RowBox[{\(Dot::"dotsh"\), \(\(:\)\(\ \)\), "\<\"Tensors \\!\\({bx, by, 0}\
\\) and \\!\\({\\(\\({0, 1}\\)\\), \\(\\({\\(\\(-1\\)\\), 0}\\)\\)}\\) have \
incompatible shapes. \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", \
ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \
ButtonData:>\\\"Dot::dotsh\\\"]\\)\"\>"}]], "Message"],

Cell[BoxData[
    \({bx, by, 0} . {{0, 1}, {\(-1\), 0}}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(a = {x, y}\)], "Input"],

Cell[BoxData[
    \({x, y}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
    \(bna = bn + l*b\), "\[IndentingNewLine]", 
    \(ba = l*b\)}], "Input"],

Cell[BoxData[
    \({\(-by\) + bx\ l, bx + by\ l}\)], "Output"],

Cell[BoxData[
    \({bx\ l, by\ l}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(crozz = \((a - ba)\)\[LeftDoubleBracket]1\[RightDoubleBracket]*\((a - 
                bna)\)\[LeftDoubleBracket]2\[RightDoubleBracket] - \((a - 
                ba)\)\[LeftDoubleBracket]2\[RightDoubleBracket]*\((a - 
                bna)\)\[LeftDoubleBracket]1\[RightDoubleBracket]\)], "Input"],

Cell[BoxData[
    \(\(-\((by - bx\ l + x)\)\)\ \((\(-by\)\ l + y)\) + \((\(-bx\)\ l + 
            x)\)\ \((\(-bx\) - by\ l + y)\)\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(sol = Solve[crozz \[Equal] 0, l]\)], "Input"],

Cell[BoxData[
    \({{l \[Rule] \(bx\ x + by\ y\)\/\(bx\^2 + by\^2\)}}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(baa = Simplify[ReplaceAll[ba, \(sol[\([1]\)]\)[\([1]\)]]]\)], "Input"],

Cell[BoxData[
    \({\(bx\ \((bx\ x + by\ y)\)\)\/\(bx\^2 + by\^2\), \(by\ \((bx\ x + by\ \
y)\)\)\/\(bx\^2 + by\^2\)}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(finalsol = Simplify[\((\((a - baa)\) 2 + baa)\)]\)], "Input"],

Cell[BoxData[
    \({\(bx\^2\ x + 2\ by\^2\ x - bx\ by\ y\)\/\(bx\^2 + by\^2\), \(\(-bx\)\ \
by\ x + 2\ bx\^2\ y + by\^2\ y\)\/\(bx\^2 + by\^2\)}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
    \(bb = {2, \(-1\)}\), "\[IndentingNewLine]", 
    \(bb . {{0, 1}, {\(-1\), 0}}\)}], "Input"],

Cell[BoxData[
    \({2, \(-1\)}\)], "Output"],

Cell[BoxData[
    \({1, 2}\)], "Output"]
}, Open  ]],

Cell[BoxData[""], "Input"],

Cell[CellGroupData[{

Cell[BoxData[{
    \(\(P0 = {x0, y0};\)\), "\[IndentingNewLine]", 
    \(\(P1 = {x1, y1};\)\), "\[IndentingNewLine]", 
    \(\(P2 = {x2, y2};\)\), "\[IndentingNewLine]", 
    \(B = \(\((1 - t)\)\^2\) P0 + 
        2  t \((1 - t)\) P1 + \(t\^2\) P2\)}], "Input"],

Cell[BoxData[
    \({\((1 - t)\)\^2\ x0 + 2\ \((1 - t)\)\ t\ x1 + 
        t\^2\ x2, \((1 - t)\)\^2\ y0 + 2\ \((1 - t)\)\ t\ y1 + 
        t\^2\ y2}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(dist = \((P1 - B)\)\[LeftDoubleBracket]1\[RightDoubleBracket]\^2 + \
\((P1 - B)\)\[LeftDoubleBracket]2\[RightDoubleBracket]\^2\)], "Input"],

Cell[BoxData[
    \(\((\(-\((1 - t)\)\^2\)\ x0 + x1 - 2\ \((1 - t)\)\ t\ x1 - t\^2\ \
x2)\)\^2 + \((\(-\((1 - t)\)\^2\)\ y0 + y1 - 2\ \((1 - t)\)\ t\ y1 - t\^2\ \
y2)\)\^2\)], "Output"]
}, Open  ]],

Cell[BoxData[
    \(\($Assumptions = {{x0, y0, x1, y1, x2, y2, t, dist} \[Element] 
            Reals};\)\)], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
    \(Simplify[Solve[D[dist, {t, 1}] \[Equal] 0, t]]\)], "Input"],

Cell[BoxData[
    \({{t \[Rule] \((18\ \((x0\^2 + 2\ x1\^2 - x1\ x2 + 
                      x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 
                            2\ y1 + 
                            y2)\))\) - \((6\ 2\^\(1/3\)\ 3\^\(2/3\)\ \((4\ x1\
\^4 - 8\ x1\^3\ x2 + x0\^3\ \((\(-x1\) + x2)\) - 
                          x1\ x2\ \((x2\^2 + 7\ y0\^2 - 14\ y0\ y1 + 
                                8\ y1\^2 - 2\ y1\ y2 + y2\^2)\) + \((y0 - 
                                y1)\)\ \((x2\^2\ \((3\ y0 - 4\ y1 + 
                                      y2)\) - \((y1 - 
                                      y2)\)\ \((y0 - 2\ y1 + y2)\)\^2)\) + 
                          x0\^2\ \((5\ x1\^2 - 7\ x1\ x2 + 
                                2\ x2\^2 - \((y1 - y2)\)\ \((y0 - 4\ y1 + 
                                      3\ y2)\))\) + 
                          x1\^2\ \((5\ x2\^2 + 
                                4\ \((y0\^2 - 2\ y0\ y1 + 2\ y1\^2 - 
                                      2\ y1\ y2 + y2\^2)\))\) + 
                          x0\ \((\(-8\)\ x1\^3 + 14\ x1\^2\ x2 + 
                                x2\ \((x2\^2 + \((y0 - y2)\)\^2)\) - 
                                x1\ \((7\ x2\^2 + y0\^2 - 2\ y0\ y1 + 
                                      8\ y1\^2 - 14\ y1\ y2 + 
                                      7\ y2\^2)\))\))\))\)/\((\(-9\)\ x0\^2\ \
x1\^2\ y0\^2 + 18\ x0\ x1\^3\ y0\^2 + 18\ x0\^2\ x1\ x2\ y0\^2 - 36\ x0\ \
x1\^2\ x2\ y0\^2 - 18\ x1\^3\ x2\ y0\^2 - 9\ x0\^2\ x2\^2\ y0\^2 + 18\ x0\ x1\
\ x2\^2\ y0\^2 + 45\ x1\^2\ x2\^2\ y0\^2 - 36\ x1\ x2\^3\ y0\^2 + 9\ x2\^4\ \
y0\^2 - 9\ x1\^2\ y0\^4 + 18\ x1\ x2\ y0\^4 - 9\ x2\^2\ y0\^4 + 18\ x0\^3\ x1\
\ y0\ y1 - 36\ x0\^2\ x1\^2\ y0\ y1 - 18\ x0\^3\ x2\ y0\ y1 + 18\ x0\^2\ x1\ \
x2\ y0\ y1 + 72\ x0\ x1\^2\ x2\ y0\ y1 + 18\ x0\^2\ x2\^2\ y0\ y1 - 90\ x0\ \
x1\ x2\^2\ y0\ y1 - 36\ x1\^2\ x2\^2\ y0\ y1 + 18\ x0\ x2\^3\ y0\ y1 + 54\ x1\
\ x2\^3\ y0\ y1 - 18\ x2\^4\ y0\ y1 + 18\ x0\ x1\ y0\^3\ y1 + 18\ x1\^2\ \
y0\^3\ y1 - 18\ x0\ x2\ y0\^3\ y1 - 54\ x1\ x2\ y0\^3\ y1 + 36\ x2\^2\ y0\^3\ \
y1 - 9\ x0\^4\ y1\^2 + 18\ x0\^3\ x1\ y1\^2 + 18\ x0\^3\ x2\ y1\^2 - 54\ \
x0\^2\ x1\ x2\ y1\^2 + 54\ x0\ x1\ x2\^2\ y1\^2 - 18\ x0\ x2\^3\ y1\^2 - 18\ \
x1\ x2\^3\ y1\^2 + 9\ x2\^4\ y1\^2 - 9\ x0\^2\ y0\^2\ y1\^2 - 36\ x0\ x1\ \
y0\^2\ y1\^2 + 54\ x0\ x2\ y0\^2\ y1\^2 + 36\ x1\ x2\ y0\^2\ y1\^2 - 45\ \
x2\^2\ y0\^2\ y1\^2 + 18\ x0\^2\ y0\ y1\^3 - 36\ x0\ x2\ y0\ y1\^3 + 18\ \
x2\^2\ y0\ y1\^3 - 18\ x0\^3\ x1\ y0\ y2 + 54\ x0\^2\ x1\^2\ y0\ y2 - 36\ x0\ \
x1\^3\ y0\ y2 + 18\ x0\^3\ x2\ y0\ y2 - 54\ x0\^2\ x1\ x2\ y0\ y2 + 36\ x1\^3\
\ x2\ y0\ y2 + 54\ x0\ x1\ x2\^2\ y0\ y2 - 54\ x1\^2\ x2\^2\ y0\ y2 - 18\ x0\ \
x2\^3\ y0\ y2 + 18\ x1\ x2\^3\ y0\ y2 - 18\ x0\ x1\ y0\^3\ y2 + 18\ x1\^2\ y0\
\^3\ y2 + 18\ x0\ x2\ y0\^3\ y2 - 18\ x1\ x2\ y0\^3\ y2 + 18\ x0\^4\ y1\ y2 - \
54\ x0\^3\ x1\ y1\ y2 + 36\ x0\^2\ x1\^2\ y1\ y2 - 18\ x0\^3\ x2\ y1\ y2 + 90\
\ x0\^2\ x1\ x2\ y1\ y2 - 72\ x0\ x1\^2\ x2\ y1\ y2 - 18\ x0\^2\ x2\^2\ y1\ \
y2 - 18\ x0\ x1\ x2\^2\ y1\ y2 + 36\ x1\^2\ x2\^2\ y1\ y2 + 18\ x0\ x2\^3\ y1\
\ y2 - 18\ x1\ x2\^3\ y1\ y2 + 18\ x0\^2\ y0\^2\ y1\ y2 + 18\ x0\ x1\ y0\^2\ \
y1\ y2 - 54\ x1\^2\ y0\^2\ y1\ y2 - 54\ x0\ x2\ y0\^2\ y1\ y2 + 90\ x1\ x2\ \
y0\^2\ y1\ y2 - 18\ x2\^2\ y0\^2\ y1\ y2 - 36\ x0\^2\ y0\ y1\^2\ y2 + 72\ x0\ \
x1\ y0\ y1\^2\ y2 - 72\ x1\ x2\ y0\ y1\^2\ y2 + 36\ x2\^2\ y0\ y1\^2\ y2 - 18\
\ x0\^2\ y1\^3\ y2 + 36\ x0\ x2\ y1\^3\ y2 - 18\ x2\^2\ y1\^3\ y2 - 9\ x0\^4\ \
y2\^2 + 36\ x0\^3\ x1\ y2\^2 - 45\ x0\^2\ x1\^2\ y2\^2 + 18\ x0\ x1\^3\ y2\^2 \
- 18\ x0\^2\ x1\ x2\ y2\^2 + 36\ x0\ x1\^2\ x2\ y2\^2 - 18\ x1\^3\ x2\ y2\^2 \
+ 9\ x0\^2\ x2\^2\ y2\^2 - 18\ x0\ x1\ x2\^2\ y2\^2 + 9\ x1\^2\ x2\^2\ y2\^2 \
- 9\ x0\^2\ y0\^2\ y2\^2 + 18\ x0\ x1\ y0\^2\ y2\^2 - 18\ x1\ x2\ y0\^2\ \
y2\^2 + 9\ x2\^2\ y0\^2\ y2\^2 + 18\ x0\^2\ y0\ y1\ y2\^2 - 90\ x0\ x1\ y0\ \
y1\ y2\^2 + 54\ x1\^2\ y0\ y1\ y2\^2 + 54\ x0\ x2\ y0\ y1\ y2\^2 - 18\ x1\ x2\
\ y0\ y1\ y2\^2 - 18\ x2\^2\ y0\ y1\ y2\^2 + 45\ x0\^2\ y1\^2\ y2\^2 - 36\ x0\
\ x1\ y1\^2\ y2\^2 - 54\ x0\ x2\ y1\^2\ y2\^2 + 36\ x1\ x2\ y1\^2\ y2\^2 + 9\ \
x2\^2\ y1\^2\ y2\^2 + 18\ x0\ x1\ y0\ y2\^3 - 18\ x1\^2\ y0\ y2\^3 - 18\ x0\ \
x2\ y0\ y2\^3 + 18\ x1\ x2\ y0\ y2\^3 - 36\ x0\^2\ y1\ y2\^3 + 54\ x0\ x1\ y1\
\ y2\^3 - 18\ x1\^2\ y1\ y2\^3 + 18\ x0\ x2\ y1\ y2\^3 - 18\ x1\ x2\ y1\ \
y2\^3 + 9\ x0\^2\ y2\^4 - 18\ x0\ x1\ y2\^4 + 9\ x1\^2\ y2\^4 + 1\/3\ \[Sqrt]\
\((729\ \((x0\^2 - 2\ x0\ x1 + 2\ x1\ x2 - x2\^2 + y0\^2 - 2\ y0\ y1 + 2\ y1\ \
y2 - y2\^2)\)\^2\ \((x2\ \((\(-y0\) + y1)\) + x1\ \((y0 - y2)\) + x0\ \
\((\(-y1\) + y2)\))\)\^4 + 4\ \((3\ \((x0\^2 - 4\ x0\ x1 + 4\ x1\^2 + 2\ x0\ \
x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ y0\ y1 + 4\ y1\^2 + 2\ y0\ y2 - 4\ y1\ y2 \
+ y2\^2)\)\ \((3\ x0\^2 + 4\ x1\^2 - x1\ x2 + x0\ \((\(-7\)\ x1 + x2)\) + \
\((y0 - y1)\)\ \((3\ y0 - 4\ y1 + y2)\))\) - 9\ \((x0\^2 + 2\ x1\^2 - x1\ x2 \
+ x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 2\ y1 + \
y2)\))\)\^2)\)\^3)\))\)\^\(1/3\) + 
                3\ 2\^\(2/3\)\ 3\^\(1/3\)\ \((\(-9\)\ x0\^2\ x1\^2\ y0\^2 + \
18\ x0\ x1\^3\ y0\^2 + 18\ x0\^2\ x1\ x2\ y0\^2 - 36\ x0\ x1\^2\ x2\ y0\^2 - \
18\ x1\^3\ x2\ y0\^2 - 9\ x0\^2\ x2\^2\ y0\^2 + 18\ x0\ x1\ x2\^2\ y0\^2 + 45\
\ x1\^2\ x2\^2\ y0\^2 - 36\ x1\ x2\^3\ y0\^2 + 9\ x2\^4\ y0\^2 - 9\ x1\^2\ y0\
\^4 + 18\ x1\ x2\ y0\^4 - 9\ x2\^2\ y0\^4 + 18\ x0\^3\ x1\ y0\ y1 - 36\ x0\^2\
\ x1\^2\ y0\ y1 - 18\ x0\^3\ x2\ y0\ y1 + 18\ x0\^2\ x1\ x2\ y0\ y1 + 72\ x0\ \
x1\^2\ x2\ y0\ y1 + 18\ x0\^2\ x2\^2\ y0\ y1 - 90\ x0\ x1\ x2\^2\ y0\ y1 - 36\
\ x1\^2\ x2\^2\ y0\ y1 + 18\ x0\ x2\^3\ y0\ y1 + 54\ x1\ x2\^3\ y0\ y1 - 18\ \
x2\^4\ y0\ y1 + 18\ x0\ x1\ y0\^3\ y1 + 18\ x1\^2\ y0\^3\ y1 - 18\ x0\ x2\ y0\
\^3\ y1 - 54\ x1\ x2\ y0\^3\ y1 + 36\ x2\^2\ y0\^3\ y1 - 9\ x0\^4\ y1\^2 + 18\
\ x0\^3\ x1\ y1\^2 + 18\ x0\^3\ x2\ y1\^2 - 54\ x0\^2\ x1\ x2\ y1\^2 + 54\ x0\
\ x1\ x2\^2\ y1\^2 - 18\ x0\ x2\^3\ y1\^2 - 18\ x1\ x2\^3\ y1\^2 + 9\ x2\^4\ \
y1\^2 - 9\ x0\^2\ y0\^2\ y1\^2 - 36\ x0\ x1\ y0\^2\ y1\^2 + 54\ x0\ x2\ y0\^2\
\ y1\^2 + 36\ x1\ x2\ y0\^2\ y1\^2 - 45\ x2\^2\ y0\^2\ y1\^2 + 18\ x0\^2\ y0\ \
y1\^3 - 36\ x0\ x2\ y0\ y1\^3 + 18\ x2\^2\ y0\ y1\^3 - 18\ x0\^3\ x1\ y0\ y2 \
+ 54\ x0\^2\ x1\^2\ y0\ y2 - 36\ x0\ x1\^3\ y0\ y2 + 18\ x0\^3\ x2\ y0\ y2 - \
54\ x0\^2\ x1\ x2\ y0\ y2 + 36\ x1\^3\ x2\ y0\ y2 + 54\ x0\ x1\ x2\^2\ y0\ y2 \
- 54\ x1\^2\ x2\^2\ y0\ y2 - 18\ x0\ x2\^3\ y0\ y2 + 18\ x1\ x2\^3\ y0\ y2 - \
18\ x0\ x1\ y0\^3\ y2 + 18\ x1\^2\ y0\^3\ y2 + 18\ x0\ x2\ y0\^3\ y2 - 18\ x1\
\ x2\ y0\^3\ y2 + 18\ x0\^4\ y1\ y2 - 54\ x0\^3\ x1\ y1\ y2 + 36\ x0\^2\ \
x1\^2\ y1\ y2 - 18\ x0\^3\ x2\ y1\ y2 + 90\ x0\^2\ x1\ x2\ y1\ y2 - 72\ x0\ \
x1\^2\ x2\ y1\ y2 - 18\ x0\^2\ x2\^2\ y1\ y2 - 18\ x0\ x1\ x2\^2\ y1\ y2 + 36\
\ x1\^2\ x2\^2\ y1\ y2 + 18\ x0\ x2\^3\ y1\ y2 - 18\ x1\ x2\^3\ y1\ y2 + 18\ \
x0\^2\ y0\^2\ y1\ y2 + 18\ x0\ x1\ y0\^2\ y1\ y2 - 54\ x1\^2\ y0\^2\ y1\ y2 - \
54\ x0\ x2\ y0\^2\ y1\ y2 + 90\ x1\ x2\ y0\^2\ y1\ y2 - 18\ x2\^2\ y0\^2\ y1\ \
y2 - 36\ x0\^2\ y0\ y1\^2\ y2 + 72\ x0\ x1\ y0\ y1\^2\ y2 - 72\ x1\ x2\ y0\ \
y1\^2\ y2 + 36\ x2\^2\ y0\ y1\^2\ y2 - 18\ x0\^2\ y1\^3\ y2 + 36\ x0\ x2\ \
y1\^3\ y2 - 18\ x2\^2\ y1\^3\ y2 - 9\ x0\^4\ y2\^2 + 36\ x0\^3\ x1\ y2\^2 - \
45\ x0\^2\ x1\^2\ y2\^2 + 18\ x0\ x1\^3\ y2\^2 - 18\ x0\^2\ x1\ x2\ y2\^2 + \
36\ x0\ x1\^2\ x2\ y2\^2 - 18\ x1\^3\ x2\ y2\^2 + 9\ x0\^2\ x2\^2\ y2\^2 - 18\
\ x0\ x1\ x2\^2\ y2\^2 + 9\ x1\^2\ x2\^2\ y2\^2 - 9\ x0\^2\ y0\^2\ y2\^2 + 18\
\ x0\ x1\ y0\^2\ y2\^2 - 18\ x1\ x2\ y0\^2\ y2\^2 + 9\ x2\^2\ y0\^2\ y2\^2 + \
18\ x0\^2\ y0\ y1\ y2\^2 - 90\ x0\ x1\ y0\ y1\ y2\^2 + 54\ x1\^2\ y0\ y1\ \
y2\^2 + 54\ x0\ x2\ y0\ y1\ y2\^2 - 18\ x1\ x2\ y0\ y1\ y2\^2 - 18\ x2\^2\ y0\
\ y1\ y2\^2 + 45\ x0\^2\ y1\^2\ y2\^2 - 36\ x0\ x1\ y1\^2\ y2\^2 - 54\ x0\ x2\
\ y1\^2\ y2\^2 + 36\ x1\ x2\ y1\^2\ y2\^2 + 9\ x2\^2\ y1\^2\ y2\^2 + 18\ x0\ \
x1\ y0\ y2\^3 - 18\ x1\^2\ y0\ y2\^3 - 18\ x0\ x2\ y0\ y2\^3 + 18\ x1\ x2\ y0\
\ y2\^3 - 36\ x0\^2\ y1\ y2\^3 + 54\ x0\ x1\ y1\ y2\^3 - 18\ x1\^2\ y1\ y2\^3 \
+ 18\ x0\ x2\ y1\ y2\^3 - 18\ x1\ x2\ y1\ y2\^3 + 9\ x0\^2\ y2\^4 - 18\ x0\ \
x1\ y2\^4 + 9\ x1\^2\ y2\^4 + 1\/3\ \[Sqrt]\((729\ \((x0\^2 - 2\ x0\ x1 + 2\ \
x1\ x2 - x2\^2 + y0\^2 - 2\ y0\ y1 + 2\ y1\ y2 - y2\^2)\)\^2\ \((x2\ \((\(-y0\
\) + y1)\) + x1\ \((y0 - y2)\) + x0\ \((\(-y1\) + y2)\))\)\^4 + 4\ \((3\ \
\((x0\^2 - 4\ x0\ x1 + 4\ x1\^2 + 2\ x0\ x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ \
y0\ y1 + 4\ y1\^2 + 2\ y0\ y2 - 4\ y1\ y2 + y2\^2)\)\ \((3\ x0\^2 + 4\ x1\^2 \
- x1\ x2 + x0\ \((\(-7\)\ x1 + x2)\) + \((y0 - y1)\)\ \((3\ y0 - 4\ y1 + \
y2)\))\) - 9\ \((x0\^2 + 2\ x1\^2 - x1\ x2 + x0\ \((\(-3\)\ x1 + x2)\) + \
\((y0 - y1)\)\ \((y0 - 2\ y1 + y2)\))\)\^2)\)\^3)\))\)\^\(1/3\))\)/\((18\ \
\((x0\^2 - 4\ x0\ x1 + 4\ x1\^2 + 2\ x0\ x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 
                    4\ y0\ y1 + 4\ y1\^2 + 2\ y0\ y2 - 4\ y1\ y2 + 
                    y2\^2)\))\)}, {t \[Rule] \((36\ \((x0\^2 + 2\ x1\^2 - 
                      x1\ x2 + 
                      x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 
                            2\ y1 + 
                            y2)\))\) + \((6\ 2\^\(1/3\)\ 3\^\(2/3\)\ \((1 + \
\[ImaginaryI]\ \@3)\)\ \((4\ x1\^4 - 8\ x1\^3\ x2 + 
                          x0\^3\ \((\(-x1\) + x2)\) - 
                          x1\ x2\ \((x2\^2 + 7\ y0\^2 - 14\ y0\ y1 + 
                                8\ y1\^2 - 2\ y1\ y2 + y2\^2)\) + \((y0 - 
                                y1)\)\ \((x2\^2\ \((3\ y0 - 4\ y1 + 
                                      y2)\) - \((y1 - 
                                      y2)\)\ \((y0 - 2\ y1 + y2)\)\^2)\) + 
                          x0\^2\ \((5\ x1\^2 - 7\ x1\ x2 + 
                                2\ x2\^2 - \((y1 - y2)\)\ \((y0 - 4\ y1 + 
                                      3\ y2)\))\) + 
                          x1\^2\ \((5\ x2\^2 + 
                                4\ \((y0\^2 - 2\ y0\ y1 + 2\ y1\^2 - 
                                      2\ y1\ y2 + y2\^2)\))\) + 
                          x0\ \((\(-8\)\ x1\^3 + 14\ x1\^2\ x2 + 
                                x2\ \((x2\^2 + \((y0 - y2)\)\^2)\) - 
                                x1\ \((7\ x2\^2 + y0\^2 - 2\ y0\ y1 + 
                                      8\ y1\^2 - 14\ y1\ y2 + 
                                      7\ y2\^2)\))\))\))\)/\((\(-9\)\ x0\^2\ \
x1\^2\ y0\^2 + 18\ x0\ x1\^3\ y0\^2 + 18\ x0\^2\ x1\ x2\ y0\^2 - 36\ x0\ \
x1\^2\ x2\ y0\^2 - 18\ x1\^3\ x2\ y0\^2 - 9\ x0\^2\ x2\^2\ y0\^2 + 18\ x0\ x1\
\ x2\^2\ y0\^2 + 45\ x1\^2\ x2\^2\ y0\^2 - 36\ x1\ x2\^3\ y0\^2 + 9\ x2\^4\ \
y0\^2 - 9\ x1\^2\ y0\^4 + 18\ x1\ x2\ y0\^4 - 9\ x2\^2\ y0\^4 + 18\ x0\^3\ x1\
\ y0\ y1 - 36\ x0\^2\ x1\^2\ y0\ y1 - 18\ x0\^3\ x2\ y0\ y1 + 18\ x0\^2\ x1\ \
x2\ y0\ y1 + 72\ x0\ x1\^2\ x2\ y0\ y1 + 18\ x0\^2\ x2\^2\ y0\ y1 - 90\ x0\ \
x1\ x2\^2\ y0\ y1 - 36\ x1\^2\ x2\^2\ y0\ y1 + 18\ x0\ x2\^3\ y0\ y1 + 54\ x1\
\ x2\^3\ y0\ y1 - 18\ x2\^4\ y0\ y1 + 18\ x0\ x1\ y0\^3\ y1 + 18\ x1\^2\ \
y0\^3\ y1 - 18\ x0\ x2\ y0\^3\ y1 - 54\ x1\ x2\ y0\^3\ y1 + 36\ x2\^2\ y0\^3\ \
y1 - 9\ x0\^4\ y1\^2 + 18\ x0\^3\ x1\ y1\^2 + 18\ x0\^3\ x2\ y1\^2 - 54\ \
x0\^2\ x1\ x2\ y1\^2 + 54\ x0\ x1\ x2\^2\ y1\^2 - 18\ x0\ x2\^3\ y1\^2 - 18\ \
x1\ x2\^3\ y1\^2 + 9\ x2\^4\ y1\^2 - 9\ x0\^2\ y0\^2\ y1\^2 - 36\ x0\ x1\ \
y0\^2\ y1\^2 + 54\ x0\ x2\ y0\^2\ y1\^2 + 36\ x1\ x2\ y0\^2\ y1\^2 - 45\ \
x2\^2\ y0\^2\ y1\^2 + 18\ x0\^2\ y0\ y1\^3 - 36\ x0\ x2\ y0\ y1\^3 + 18\ \
x2\^2\ y0\ y1\^3 - 18\ x0\^3\ x1\ y0\ y2 + 54\ x0\^2\ x1\^2\ y0\ y2 - 36\ x0\ \
x1\^3\ y0\ y2 + 18\ x0\^3\ x2\ y0\ y2 - 54\ x0\^2\ x1\ x2\ y0\ y2 + 36\ x1\^3\
\ x2\ y0\ y2 + 54\ x0\ x1\ x2\^2\ y0\ y2 - 54\ x1\^2\ x2\^2\ y0\ y2 - 18\ x0\ \
x2\^3\ y0\ y2 + 18\ x1\ x2\^3\ y0\ y2 - 18\ x0\ x1\ y0\^3\ y2 + 18\ x1\^2\ y0\
\^3\ y2 + 18\ x0\ x2\ y0\^3\ y2 - 18\ x1\ x2\ y0\^3\ y2 + 18\ x0\^4\ y1\ y2 - \
54\ x0\^3\ x1\ y1\ y2 + 36\ x0\^2\ x1\^2\ y1\ y2 - 18\ x0\^3\ x2\ y1\ y2 + 90\
\ x0\^2\ x1\ x2\ y1\ y2 - 72\ x0\ x1\^2\ x2\ y1\ y2 - 18\ x0\^2\ x2\^2\ y1\ \
y2 - 18\ x0\ x1\ x2\^2\ y1\ y2 + 36\ x1\^2\ x2\^2\ y1\ y2 + 18\ x0\ x2\^3\ y1\
\ y2 - 18\ x1\ x2\^3\ y1\ y2 + 18\ x0\^2\ y0\^2\ y1\ y2 + 18\ x0\ x1\ y0\^2\ \
y1\ y2 - 54\ x1\^2\ y0\^2\ y1\ y2 - 54\ x0\ x2\ y0\^2\ y1\ y2 + 90\ x1\ x2\ \
y0\^2\ y1\ y2 - 18\ x2\^2\ y0\^2\ y1\ y2 - 36\ x0\^2\ y0\ y1\^2\ y2 + 72\ x0\ \
x1\ y0\ y1\^2\ y2 - 72\ x1\ x2\ y0\ y1\^2\ y2 + 36\ x2\^2\ y0\ y1\^2\ y2 - 18\
\ x0\^2\ y1\^3\ y2 + 36\ x0\ x2\ y1\^3\ y2 - 18\ x2\^2\ y1\^3\ y2 - 9\ x0\^4\ \
y2\^2 + 36\ x0\^3\ x1\ y2\^2 - 45\ x0\^2\ x1\^2\ y2\^2 + 18\ x0\ x1\^3\ y2\^2 \
- 18\ x0\^2\ x1\ x2\ y2\^2 + 36\ x0\ x1\^2\ x2\ y2\^2 - 18\ x1\^3\ x2\ y2\^2 \
+ 9\ x0\^2\ x2\^2\ y2\^2 - 18\ x0\ x1\ x2\^2\ y2\^2 + 9\ x1\^2\ x2\^2\ y2\^2 \
- 9\ x0\^2\ y0\^2\ y2\^2 + 18\ x0\ x1\ y0\^2\ y2\^2 - 18\ x1\ x2\ y0\^2\ \
y2\^2 + 9\ x2\^2\ y0\^2\ y2\^2 + 18\ x0\^2\ y0\ y1\ y2\^2 - 90\ x0\ x1\ y0\ \
y1\ y2\^2 + 54\ x1\^2\ y0\ y1\ y2\^2 + 54\ x0\ x2\ y0\ y1\ y2\^2 - 18\ x1\ x2\
\ y0\ y1\ y2\^2 - 18\ x2\^2\ y0\ y1\ y2\^2 + 45\ x0\^2\ y1\^2\ y2\^2 - 36\ x0\
\ x1\ y1\^2\ y2\^2 - 54\ x0\ x2\ y1\^2\ y2\^2 + 36\ x1\ x2\ y1\^2\ y2\^2 + 9\ \
x2\^2\ y1\^2\ y2\^2 + 18\ x0\ x1\ y0\ y2\^3 - 18\ x1\^2\ y0\ y2\^3 - 18\ x0\ \
x2\ y0\ y2\^3 + 18\ x1\ x2\ y0\ y2\^3 - 36\ x0\^2\ y1\ y2\^3 + 54\ x0\ x1\ y1\
\ y2\^3 - 18\ x1\^2\ y1\ y2\^3 + 18\ x0\ x2\ y1\ y2\^3 - 18\ x1\ x2\ y1\ \
y2\^3 + 9\ x0\^2\ y2\^4 - 18\ x0\ x1\ y2\^4 + 9\ x1\^2\ y2\^4 + 1\/3\ \[Sqrt]\
\((729\ \((x0\^2 - 2\ x0\ x1 + 2\ x1\ x2 - x2\^2 + y0\^2 - 2\ y0\ y1 + 2\ y1\ \
y2 - y2\^2)\)\^2\ \((x2\ \((\(-y0\) + y1)\) + x1\ \((y0 - y2)\) + x0\ \
\((\(-y1\) + y2)\))\)\^4 + 4\ \((3\ \((x0\^2 - 4\ x0\ x1 + 4\ x1\^2 + 2\ x0\ \
x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ y0\ y1 + 4\ y1\^2 + 2\ y0\ y2 - 4\ y1\ y2 \
+ y2\^2)\)\ \((3\ x0\^2 + 4\ x1\^2 - x1\ x2 + x0\ \((\(-7\)\ x1 + x2)\) + \
\((y0 - y1)\)\ \((3\ y0 - 4\ y1 + y2)\))\) - 9\ \((x0\^2 + 2\ x1\^2 - x1\ x2 \
+ x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 2\ y1 + \
y2)\))\)\^2)\)\^3)\))\)\^\(1/3\) + 
                3\ \[ImaginaryI]\ 2\^\(2/3\)\ 3\^\(1/3\)\ \((\[ImaginaryI] + \
\@3)\)\ \((\(-9\)\ x0\^2\ x1\^2\ y0\^2 + 18\ x0\ x1\^3\ y0\^2 + 18\ x0\^2\ x1\
\ x2\ y0\^2 - 36\ x0\ x1\^2\ x2\ y0\^2 - 18\ x1\^3\ x2\ y0\^2 - 9\ x0\^2\ \
x2\^2\ y0\^2 + 18\ x0\ x1\ x2\^2\ y0\^2 + 45\ x1\^2\ x2\^2\ y0\^2 - 36\ x1\ \
x2\^3\ y0\^2 + 9\ x2\^4\ y0\^2 - 9\ x1\^2\ y0\^4 + 18\ x1\ x2\ y0\^4 - 9\ \
x2\^2\ y0\^4 + 18\ x0\^3\ x1\ y0\ y1 - 36\ x0\^2\ x1\^2\ y0\ y1 - 18\ x0\^3\ \
x2\ y0\ y1 + 18\ x0\^2\ x1\ x2\ y0\ y1 + 72\ x0\ x1\^2\ x2\ y0\ y1 + 18\ \
x0\^2\ x2\^2\ y0\ y1 - 90\ x0\ x1\ x2\^2\ y0\ y1 - 36\ x1\^2\ x2\^2\ y0\ y1 + \
18\ x0\ x2\^3\ y0\ y1 + 54\ x1\ x2\^3\ y0\ y1 - 18\ x2\^4\ y0\ y1 + 18\ x0\ \
x1\ y0\^3\ y1 + 18\ x1\^2\ y0\^3\ y1 - 18\ x0\ x2\ y0\^3\ y1 - 54\ x1\ x2\ y0\
\^3\ y1 + 36\ x2\^2\ y0\^3\ y1 - 9\ x0\^4\ y1\^2 + 18\ x0\^3\ x1\ y1\^2 + 18\ \
x0\^3\ x2\ y1\^2 - 54\ x0\^2\ x1\ x2\ y1\^2 + 54\ x0\ x1\ x2\^2\ y1\^2 - 18\ \
x0\ x2\^3\ y1\^2 - 18\ x1\ x2\^3\ y1\^2 + 9\ x2\^4\ y1\^2 - 9\ x0\^2\ y0\^2\ \
y1\^2 - 36\ x0\ x1\ y0\^2\ y1\^2 + 54\ x0\ x2\ y0\^2\ y1\^2 + 36\ x1\ x2\ \
y0\^2\ y1\^2 - 45\ x2\^2\ y0\^2\ y1\^2 + 18\ x0\^2\ y0\ y1\^3 - 36\ x0\ x2\ \
y0\ y1\^3 + 18\ x2\^2\ y0\ y1\^3 - 18\ x0\^3\ x1\ y0\ y2 + 54\ x0\^2\ x1\^2\ \
y0\ y2 - 36\ x0\ x1\^3\ y0\ y2 + 18\ x0\^3\ x2\ y0\ y2 - 54\ x0\^2\ x1\ x2\ \
y0\ y2 + 36\ x1\^3\ x2\ y0\ y2 + 54\ x0\ x1\ x2\^2\ y0\ y2 - 54\ x1\^2\ x2\^2\
\ y0\ y2 - 18\ x0\ x2\^3\ y0\ y2 + 18\ x1\ x2\^3\ y0\ y2 - 18\ x0\ x1\ y0\^3\ \
y2 + 18\ x1\^2\ y0\^3\ y2 + 18\ x0\ x2\ y0\^3\ y2 - 18\ x1\ x2\ y0\^3\ y2 + \
18\ x0\^4\ y1\ y2 - 54\ x0\^3\ x1\ y1\ y2 + 36\ x0\^2\ x1\^2\ y1\ y2 - 18\ x0\
\^3\ x2\ y1\ y2 + 90\ x0\^2\ x1\ x2\ y1\ y2 - 72\ x0\ x1\^2\ x2\ y1\ y2 - 18\ \
x0\^2\ x2\^2\ y1\ y2 - 18\ x0\ x1\ x2\^2\ y1\ y2 + 36\ x1\^2\ x2\^2\ y1\ y2 + \
18\ x0\ x2\^3\ y1\ y2 - 18\ x1\ x2\^3\ y1\ y2 + 18\ x0\^2\ y0\^2\ y1\ y2 + 18\
\ x0\ x1\ y0\^2\ y1\ y2 - 54\ x1\^2\ y0\^2\ y1\ y2 - 54\ x0\ x2\ y0\^2\ y1\ \
y2 + 90\ x1\ x2\ y0\^2\ y1\ y2 - 18\ x2\^2\ y0\^2\ y1\ y2 - 36\ x0\^2\ y0\ y1\
\^2\ y2 + 72\ x0\ x1\ y0\ y1\^2\ y2 - 72\ x1\ x2\ y0\ y1\^2\ y2 + 36\ x2\^2\ \
y0\ y1\^2\ y2 - 18\ x0\^2\ y1\^3\ y2 + 36\ x0\ x2\ y1\^3\ y2 - 18\ x2\^2\ \
y1\^3\ y2 - 9\ x0\^4\ y2\^2 + 36\ x0\^3\ x1\ y2\^2 - 45\ x0\^2\ x1\^2\ y2\^2 \
+ 18\ x0\ x1\^3\ y2\^2 - 18\ x0\^2\ x1\ x2\ y2\^2 + 36\ x0\ x1\^2\ x2\ y2\^2 \
- 18\ x1\^3\ x2\ y2\^2 + 9\ x0\^2\ x2\^2\ y2\^2 - 18\ x0\ x1\ x2\^2\ y2\^2 + \
9\ x1\^2\ x2\^2\ y2\^2 - 9\ x0\^2\ y0\^2\ y2\^2 + 18\ x0\ x1\ y0\^2\ y2\^2 - \
18\ x1\ x2\ y0\^2\ y2\^2 + 9\ x2\^2\ y0\^2\ y2\^2 + 18\ x0\^2\ y0\ y1\ y2\^2 \
- 90\ x0\ x1\ y0\ y1\ y2\^2 + 54\ x1\^2\ y0\ y1\ y2\^2 + 54\ x0\ x2\ y0\ y1\ \
y2\^2 - 18\ x1\ x2\ y0\ y1\ y2\^2 - 18\ x2\^2\ y0\ y1\ y2\^2 + 45\ x0\^2\ \
y1\^2\ y2\^2 - 36\ x0\ x1\ y1\^2\ y2\^2 - 54\ x0\ x2\ y1\^2\ y2\^2 + 36\ x1\ \
x2\ y1\^2\ y2\^2 + 9\ x2\^2\ y1\^2\ y2\^2 + 18\ x0\ x1\ y0\ y2\^3 - 18\ x1\^2\
\ y0\ y2\^3 - 18\ x0\ x2\ y0\ y2\^3 + 18\ x1\ x2\ y0\ y2\^3 - 36\ x0\^2\ y1\ \
y2\^3 + 54\ x0\ x1\ y1\ y2\^3 - 18\ x1\^2\ y1\ y2\^3 + 18\ x0\ x2\ y1\ y2\^3 \
- 18\ x1\ x2\ y1\ y2\^3 + 9\ x0\^2\ y2\^4 - 18\ x0\ x1\ y2\^4 + 9\ x1\^2\ \
y2\^4 + 1\/3\ \[Sqrt]\((729\ \((x0\^2 - 2\ x0\ x1 + 2\ x1\ x2 - x2\^2 + y0\^2 \
- 2\ y0\ y1 + 2\ y1\ y2 - y2\^2)\)\^2\ \((x2\ \((\(-y0\) + y1)\) + x1\ \((y0 \
- y2)\) + x0\ \((\(-y1\) + y2)\))\)\^4 + 4\ \((3\ \((x0\^2 - 4\ x0\ x1 + 4\ \
x1\^2 + 2\ x0\ x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ y0\ y1 + 4\ y1\^2 + 2\ y0\ \
y2 - 4\ y1\ y2 + y2\^2)\)\ \((3\ x0\^2 + 4\ x1\^2 - x1\ x2 + x0\ \((\(-7\)\ \
x1 + x2)\) + \((y0 - y1)\)\ \((3\ y0 - 4\ y1 + y2)\))\) - 9\ \((x0\^2 + 2\ x1\
\^2 - x1\ x2 + x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 2\ y1 + y2)\
\))\)\^2)\)\^3)\))\)\^\(1/3\))\)/\((36\ \((x0\^2 - 4\ x0\ x1 + 4\ x1\^2 + 
                    2\ x0\ x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ y0\ y1 + 
                    4\ y1\^2 + 2\ y0\ y2 - 4\ y1\ y2 + 
                    y2\^2)\))\)}, {t \[Rule] \((36\ \((x0\^2 + 2\ x1\^2 - 
                      x1\ x2 + 
                      x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 
                            2\ y1 + 
                            y2)\))\) + \((6\ 2\^\(1/3\)\ 3\^\(2/3\)\ \((1 - \
\[ImaginaryI]\ \@3)\)\ \((4\ x1\^4 - 8\ x1\^3\ x2 + 
                          x0\^3\ \((\(-x1\) + x2)\) - 
                          x1\ x2\ \((x2\^2 + 7\ y0\^2 - 14\ y0\ y1 + 
                                8\ y1\^2 - 2\ y1\ y2 + y2\^2)\) + \((y0 - 
                                y1)\)\ \((x2\^2\ \((3\ y0 - 4\ y1 + 
                                      y2)\) - \((y1 - 
                                      y2)\)\ \((y0 - 2\ y1 + y2)\)\^2)\) + 
                          x0\^2\ \((5\ x1\^2 - 7\ x1\ x2 + 
                                2\ x2\^2 - \((y1 - y2)\)\ \((y0 - 4\ y1 + 
                                      3\ y2)\))\) + 
                          x1\^2\ \((5\ x2\^2 + 
                                4\ \((y0\^2 - 2\ y0\ y1 + 2\ y1\^2 - 
                                      2\ y1\ y2 + y2\^2)\))\) + 
                          x0\ \((\(-8\)\ x1\^3 + 14\ x1\^2\ x2 + 
                                x2\ \((x2\^2 + \((y0 - y2)\)\^2)\) - 
                                x1\ \((7\ x2\^2 + y0\^2 - 2\ y0\ y1 + 
                                      8\ y1\^2 - 14\ y1\ y2 + 
                                      7\ y2\^2)\))\))\))\)/\((\(-9\)\ x0\^2\ \
x1\^2\ y0\^2 + 18\ x0\ x1\^3\ y0\^2 + 18\ x0\^2\ x1\ x2\ y0\^2 - 36\ x0\ \
x1\^2\ x2\ y0\^2 - 18\ x1\^3\ x2\ y0\^2 - 9\ x0\^2\ x2\^2\ y0\^2 + 18\ x0\ x1\
\ x2\^2\ y0\^2 + 45\ x1\^2\ x2\^2\ y0\^2 - 36\ x1\ x2\^3\ y0\^2 + 9\ x2\^4\ \
y0\^2 - 9\ x1\^2\ y0\^4 + 18\ x1\ x2\ y0\^4 - 9\ x2\^2\ y0\^4 + 18\ x0\^3\ x1\
\ y0\ y1 - 36\ x0\^2\ x1\^2\ y0\ y1 - 18\ x0\^3\ x2\ y0\ y1 + 18\ x0\^2\ x1\ \
x2\ y0\ y1 + 72\ x0\ x1\^2\ x2\ y0\ y1 + 18\ x0\^2\ x2\^2\ y0\ y1 - 90\ x0\ \
x1\ x2\^2\ y0\ y1 - 36\ x1\^2\ x2\^2\ y0\ y1 + 18\ x0\ x2\^3\ y0\ y1 + 54\ x1\
\ x2\^3\ y0\ y1 - 18\ x2\^4\ y0\ y1 + 18\ x0\ x1\ y0\^3\ y1 + 18\ x1\^2\ \
y0\^3\ y1 - 18\ x0\ x2\ y0\^3\ y1 - 54\ x1\ x2\ y0\^3\ y1 + 36\ x2\^2\ y0\^3\ \
y1 - 9\ x0\^4\ y1\^2 + 18\ x0\^3\ x1\ y1\^2 + 18\ x0\^3\ x2\ y1\^2 - 54\ \
x0\^2\ x1\ x2\ y1\^2 + 54\ x0\ x1\ x2\^2\ y1\^2 - 18\ x0\ x2\^3\ y1\^2 - 18\ \
x1\ x2\^3\ y1\^2 + 9\ x2\^4\ y1\^2 - 9\ x0\^2\ y0\^2\ y1\^2 - 36\ x0\ x1\ \
y0\^2\ y1\^2 + 54\ x0\ x2\ y0\^2\ y1\^2 + 36\ x1\ x2\ y0\^2\ y1\^2 - 45\ \
x2\^2\ y0\^2\ y1\^2 + 18\ x0\^2\ y0\ y1\^3 - 36\ x0\ x2\ y0\ y1\^3 + 18\ \
x2\^2\ y0\ y1\^3 - 18\ x0\^3\ x1\ y0\ y2 + 54\ x0\^2\ x1\^2\ y0\ y2 - 36\ x0\ \
x1\^3\ y0\ y2 + 18\ x0\^3\ x2\ y0\ y2 - 54\ x0\^2\ x1\ x2\ y0\ y2 + 36\ x1\^3\
\ x2\ y0\ y2 + 54\ x0\ x1\ x2\^2\ y0\ y2 - 54\ x1\^2\ x2\^2\ y0\ y2 - 18\ x0\ \
x2\^3\ y0\ y2 + 18\ x1\ x2\^3\ y0\ y2 - 18\ x0\ x1\ y0\^3\ y2 + 18\ x1\^2\ y0\
\^3\ y2 + 18\ x0\ x2\ y0\^3\ y2 - 18\ x1\ x2\ y0\^3\ y2 + 18\ x0\^4\ y1\ y2 - \
54\ x0\^3\ x1\ y1\ y2 + 36\ x0\^2\ x1\^2\ y1\ y2 - 18\ x0\^3\ x2\ y1\ y2 + 90\
\ x0\^2\ x1\ x2\ y1\ y2 - 72\ x0\ x1\^2\ x2\ y1\ y2 - 18\ x0\^2\ x2\^2\ y1\ \
y2 - 18\ x0\ x1\ x2\^2\ y1\ y2 + 36\ x1\^2\ x2\^2\ y1\ y2 + 18\ x0\ x2\^3\ y1\
\ y2 - 18\ x1\ x2\^3\ y1\ y2 + 18\ x0\^2\ y0\^2\ y1\ y2 + 18\ x0\ x1\ y0\^2\ \
y1\ y2 - 54\ x1\^2\ y0\^2\ y1\ y2 - 54\ x0\ x2\ y0\^2\ y1\ y2 + 90\ x1\ x2\ \
y0\^2\ y1\ y2 - 18\ x2\^2\ y0\^2\ y1\ y2 - 36\ x0\^2\ y0\ y1\^2\ y2 + 72\ x0\ \
x1\ y0\ y1\^2\ y2 - 72\ x1\ x2\ y0\ y1\^2\ y2 + 36\ x2\^2\ y0\ y1\^2\ y2 - 18\
\ x0\^2\ y1\^3\ y2 + 36\ x0\ x2\ y1\^3\ y2 - 18\ x2\^2\ y1\^3\ y2 - 9\ x0\^4\ \
y2\^2 + 36\ x0\^3\ x1\ y2\^2 - 45\ x0\^2\ x1\^2\ y2\^2 + 18\ x0\ x1\^3\ y2\^2 \
- 18\ x0\^2\ x1\ x2\ y2\^2 + 36\ x0\ x1\^2\ x2\ y2\^2 - 18\ x1\^3\ x2\ y2\^2 \
+ 9\ x0\^2\ x2\^2\ y2\^2 - 18\ x0\ x1\ x2\^2\ y2\^2 + 9\ x1\^2\ x2\^2\ y2\^2 \
- 9\ x0\^2\ y0\^2\ y2\^2 + 18\ x0\ x1\ y0\^2\ y2\^2 - 18\ x1\ x2\ y0\^2\ \
y2\^2 + 9\ x2\^2\ y0\^2\ y2\^2 + 18\ x0\^2\ y0\ y1\ y2\^2 - 90\ x0\ x1\ y0\ \
y1\ y2\^2 + 54\ x1\^2\ y0\ y1\ y2\^2 + 54\ x0\ x2\ y0\ y1\ y2\^2 - 18\ x1\ x2\
\ y0\ y1\ y2\^2 - 18\ x2\^2\ y0\ y1\ y2\^2 + 45\ x0\^2\ y1\^2\ y2\^2 - 36\ x0\
\ x1\ y1\^2\ y2\^2 - 54\ x0\ x2\ y1\^2\ y2\^2 + 36\ x1\ x2\ y1\^2\ y2\^2 + 9\ \
x2\^2\ y1\^2\ y2\^2 + 18\ x0\ x1\ y0\ y2\^3 - 18\ x1\^2\ y0\ y2\^3 - 18\ x0\ \
x2\ y0\ y2\^3 + 18\ x1\ x2\ y0\ y2\^3 - 36\ x0\^2\ y1\ y2\^3 + 54\ x0\ x1\ y1\
\ y2\^3 - 18\ x1\^2\ y1\ y2\^3 + 18\ x0\ x2\ y1\ y2\^3 - 18\ x1\ x2\ y1\ \
y2\^3 + 9\ x0\^2\ y2\^4 - 18\ x0\ x1\ y2\^4 + 9\ x1\^2\ y2\^4 + 1\/3\ \[Sqrt]\
\((729\ \((x0\^2 - 2\ x0\ x1 + 2\ x1\ x2 - x2\^2 + y0\^2 - 2\ y0\ y1 + 2\ y1\ \
y2 - y2\^2)\)\^2\ \((x2\ \((\(-y0\) + y1)\) + x1\ \((y0 - y2)\) + x0\ \
\((\(-y1\) + y2)\))\)\^4 + 4\ \((3\ \((x0\^2 - 4\ x0\ x1 + 4\ x1\^2 + 2\ x0\ \
x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ y0\ y1 + 4\ y1\^2 + 2\ y0\ y2 - 4\ y1\ y2 \
+ y2\^2)\)\ \((3\ x0\^2 + 4\ x1\^2 - x1\ x2 + x0\ \((\(-7\)\ x1 + x2)\) + \
\((y0 - y1)\)\ \((3\ y0 - 4\ y1 + y2)\))\) - 9\ \((x0\^2 + 2\ x1\^2 - x1\ x2 \
+ x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 2\ y1 + \
y2)\))\)\^2)\)\^3)\))\)\^\(1/3\) - 
                3\ 2\^\(2/3\)\ 3\^\(1/3\)\ \((1 + \[ImaginaryI]\ \@3)\)\ \
\((\(-9\)\ x0\^2\ x1\^2\ y0\^2 + 18\ x0\ x1\^3\ y0\^2 + 18\ x0\^2\ x1\ x2\ y0\
\^2 - 36\ x0\ x1\^2\ x2\ y0\^2 - 18\ x1\^3\ x2\ y0\^2 - 9\ x0\^2\ x2\^2\ \
y0\^2 + 18\ x0\ x1\ x2\^2\ y0\^2 + 45\ x1\^2\ x2\^2\ y0\^2 - 36\ x1\ x2\^3\ \
y0\^2 + 9\ x2\^4\ y0\^2 - 9\ x1\^2\ y0\^4 + 18\ x1\ x2\ y0\^4 - 9\ x2\^2\ \
y0\^4 + 18\ x0\^3\ x1\ y0\ y1 - 36\ x0\^2\ x1\^2\ y0\ y1 - 18\ x0\^3\ x2\ y0\ \
y1 + 18\ x0\^2\ x1\ x2\ y0\ y1 + 72\ x0\ x1\^2\ x2\ y0\ y1 + 18\ x0\^2\ x2\^2\
\ y0\ y1 - 90\ x0\ x1\ x2\^2\ y0\ y1 - 36\ x1\^2\ x2\^2\ y0\ y1 + 18\ x0\ \
x2\^3\ y0\ y1 + 54\ x1\ x2\^3\ y0\ y1 - 18\ x2\^4\ y0\ y1 + 18\ x0\ x1\ y0\^3\
\ y1 + 18\ x1\^2\ y0\^3\ y1 - 18\ x0\ x2\ y0\^3\ y1 - 54\ x1\ x2\ y0\^3\ y1 + \
36\ x2\^2\ y0\^3\ y1 - 9\ x0\^4\ y1\^2 + 18\ x0\^3\ x1\ y1\^2 + 18\ x0\^3\ x2\
\ y1\^2 - 54\ x0\^2\ x1\ x2\ y1\^2 + 54\ x0\ x1\ x2\^2\ y1\^2 - 18\ x0\ x2\^3\
\ y1\^2 - 18\ x1\ x2\^3\ y1\^2 + 9\ x2\^4\ y1\^2 - 9\ x0\^2\ y0\^2\ y1\^2 - \
36\ x0\ x1\ y0\^2\ y1\^2 + 54\ x0\ x2\ y0\^2\ y1\^2 + 36\ x1\ x2\ y0\^2\ \
y1\^2 - 45\ x2\^2\ y0\^2\ y1\^2 + 18\ x0\^2\ y0\ y1\^3 - 36\ x0\ x2\ y0\ \
y1\^3 + 18\ x2\^2\ y0\ y1\^3 - 18\ x0\^3\ x1\ y0\ y2 + 54\ x0\^2\ x1\^2\ y0\ \
y2 - 36\ x0\ x1\^3\ y0\ y2 + 18\ x0\^3\ x2\ y0\ y2 - 54\ x0\^2\ x1\ x2\ y0\ \
y2 + 36\ x1\^3\ x2\ y0\ y2 + 54\ x0\ x1\ x2\^2\ y0\ y2 - 54\ x1\^2\ x2\^2\ y0\
\ y2 - 18\ x0\ x2\^3\ y0\ y2 + 18\ x1\ x2\^3\ y0\ y2 - 18\ x0\ x1\ y0\^3\ y2 \
+ 18\ x1\^2\ y0\^3\ y2 + 18\ x0\ x2\ y0\^3\ y2 - 18\ x1\ x2\ y0\^3\ y2 + 18\ \
x0\^4\ y1\ y2 - 54\ x0\^3\ x1\ y1\ y2 + 36\ x0\^2\ x1\^2\ y1\ y2 - 18\ x0\^3\ \
x2\ y1\ y2 + 90\ x0\^2\ x1\ x2\ y1\ y2 - 72\ x0\ x1\^2\ x2\ y1\ y2 - 18\ \
x0\^2\ x2\^2\ y1\ y2 - 18\ x0\ x1\ x2\^2\ y1\ y2 + 36\ x1\^2\ x2\^2\ y1\ y2 + \
18\ x0\ x2\^3\ y1\ y2 - 18\ x1\ x2\^3\ y1\ y2 + 18\ x0\^2\ y0\^2\ y1\ y2 + 18\
\ x0\ x1\ y0\^2\ y1\ y2 - 54\ x1\^2\ y0\^2\ y1\ y2 - 54\ x0\ x2\ y0\^2\ y1\ \
y2 + 90\ x1\ x2\ y0\^2\ y1\ y2 - 18\ x2\^2\ y0\^2\ y1\ y2 - 36\ x0\^2\ y0\ y1\
\^2\ y2 + 72\ x0\ x1\ y0\ y1\^2\ y2 - 72\ x1\ x2\ y0\ y1\^2\ y2 + 36\ x2\^2\ \
y0\ y1\^2\ y2 - 18\ x0\^2\ y1\^3\ y2 + 36\ x0\ x2\ y1\^3\ y2 - 18\ x2\^2\ \
y1\^3\ y2 - 9\ x0\^4\ y2\^2 + 36\ x0\^3\ x1\ y2\^2 - 45\ x0\^2\ x1\^2\ y2\^2 \
+ 18\ x0\ x1\^3\ y2\^2 - 18\ x0\^2\ x1\ x2\ y2\^2 + 36\ x0\ x1\^2\ x2\ y2\^2 \
- 18\ x1\^3\ x2\ y2\^2 + 9\ x0\^2\ x2\^2\ y2\^2 - 18\ x0\ x1\ x2\^2\ y2\^2 + \
9\ x1\^2\ x2\^2\ y2\^2 - 9\ x0\^2\ y0\^2\ y2\^2 + 18\ x0\ x1\ y0\^2\ y2\^2 - \
18\ x1\ x2\ y0\^2\ y2\^2 + 9\ x2\^2\ y0\^2\ y2\^2 + 18\ x0\^2\ y0\ y1\ y2\^2 \
- 90\ x0\ x1\ y0\ y1\ y2\^2 + 54\ x1\^2\ y0\ y1\ y2\^2 + 54\ x0\ x2\ y0\ y1\ \
y2\^2 - 18\ x1\ x2\ y0\ y1\ y2\^2 - 18\ x2\^2\ y0\ y1\ y2\^2 + 45\ x0\^2\ \
y1\^2\ y2\^2 - 36\ x0\ x1\ y1\^2\ y2\^2 - 54\ x0\ x2\ y1\^2\ y2\^2 + 36\ x1\ \
x2\ y1\^2\ y2\^2 + 9\ x2\^2\ y1\^2\ y2\^2 + 18\ x0\ x1\ y0\ y2\^3 - 18\ x1\^2\
\ y0\ y2\^3 - 18\ x0\ x2\ y0\ y2\^3 + 18\ x1\ x2\ y0\ y2\^3 - 36\ x0\^2\ y1\ \
y2\^3 + 54\ x0\ x1\ y1\ y2\^3 - 18\ x1\^2\ y1\ y2\^3 + 18\ x0\ x2\ y1\ y2\^3 \
- 18\ x1\ x2\ y1\ y2\^3 + 9\ x0\^2\ y2\^4 - 18\ x0\ x1\ y2\^4 + 9\ x1\^2\ \
y2\^4 + 1\/3\ \[Sqrt]\((729\ \((x0\^2 - 2\ x0\ x1 + 2\ x1\ x2 - x2\^2 + y0\^2 \
- 2\ y0\ y1 + 2\ y1\ y2 - y2\^2)\)\^2\ \((x2\ \((\(-y0\) + y1)\) + x1\ \((y0 \
- y2)\) + x0\ \((\(-y1\) + y2)\))\)\^4 + 4\ \((3\ \((x0\^2 - 4\ x0\ x1 + 4\ \
x1\^2 + 2\ x0\ x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ y0\ y1 + 4\ y1\^2 + 2\ y0\ \
y2 - 4\ y1\ y2 + y2\^2)\)\ \((3\ x0\^2 + 4\ x1\^2 - x1\ x2 + x0\ \((\(-7\)\ \
x1 + x2)\) + \((y0 - y1)\)\ \((3\ y0 - 4\ y1 + y2)\))\) - 9\ \((x0\^2 + 2\ x1\
\^2 - x1\ x2 + x0\ \((\(-3\)\ x1 + x2)\) + \((y0 - y1)\)\ \((y0 - 2\ y1 + y2)\
\))\)\^2)\)\^3)\))\)\^\(1/3\))\)/\((36\ \((x0\^2 - 4\ x0\ x1 + 4\ x1\^2 + 
                    2\ x0\ x2 - 4\ x1\ x2 + x2\^2 + y0\^2 - 4\ y0\ y1 + 
                    4\ y1\^2 + 2\ y0\ y2 - 4\ y1\ y2 + 
                    y2\^2)\))\)}}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(\(\(\[IndentingNewLine]\)\(solx = 
      Solve[D[P1\[LeftDoubleBracket]1\[RightDoubleBracket] - 
              B\[LeftDoubleBracket]1\[RightDoubleBracket], {t, 1}] \[Equal] 
          0, t]\[IndentingNewLine]
    soly = 
      Solve[D[P1\[LeftDoubleBracket]2\[RightDoubleBracket] - 
              B\[LeftDoubleBracket]2\[RightDoubleBracket], {t, 1}] \[Equal] 
          0, t]\[IndentingNewLine]
    mymax = 
      Simplify[{ReplaceAll[
            B\[LeftDoubleBracket]1\[RightDoubleBracket], \
\(solx[\([1]\)]\)[\([1]\)]], 
          ReplaceAll[
            B\[LeftDoubleBracket]2\[RightDoubleBracket], \
\(soly[\([1]\)]\)[\([1]\)]]}]\[IndentingNewLine]
    Assuming[
      x1 \[Element] Reals && x0 \[Element] Reals && x2 \[Element] Reals && 
        Mx \[Element] Reals, 
      Solve[mymax \[Equal] {Mx, My}, P1]]\[IndentingNewLine]
    Assuming[\(x0 - x1\)\/\(x0 - 2\ x1 + x2\) \[Element] Interval[0, 1], 
      Solve[mymax \[Equal] {Mx, My}, P1]]\)\)\)], "Input"],

Cell[BoxData[
    \(2\ \((1 - t)\)\ x0 - 2\ \((1 - t)\)\ x1 + 2\ t\ x1 - 
      2\ t\ x2\)], "Output"],

Cell[BoxData[
    \({{t \[Rule] \(x0 - x1\)\/\(x0 - 2\ x1 + x2\)}}\)], "Output"],

Cell[BoxData[
    RowBox[{\(General::"spell1"\), \(\(:\)\(\ \)\), "\<\"Possible spelling \
error: new symbol name \\\"\\!\\(soly\\)\\\" is similar to existing symbol \\\
\"\\!\\(solx\\)\\\". \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", \
ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \
ButtonData:>\\\"General::spell1\\\"]\\)\"\>"}]], "Message"],

Cell[BoxData[
    \({{t \[Rule] \(y0 - y1\)\/\(y0 - 2\ y1 + y2\)}}\)], "Output"],

Cell[BoxData[
    \({\(\(-x1\^2\) + x0\ x2\)\/\(x0 - 2\ x1 + x2\), \(\(-y1\^2\) + y0\ \
y2\)\/\(y0 - 2\ y1 + y2\)}\)], "Output"],

Cell[BoxData[
    \({{x1 \[Rule] Mx - \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My - \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}, {x1 \[Rule] 
          Mx - \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My + \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}, {x1 \[Rule] 
          Mx + \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My - \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}, {x1 \[Rule] 
          Mx + \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My + \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}}\)], "Output"],

Cell[BoxData[
    \({{x1 \[Rule] Mx - \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My - \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}, {x1 \[Rule] 
          Mx - \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My + \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}, {x1 \[Rule] 
          Mx + \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My - \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}, {x1 \[Rule] 
          Mx + \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
        y1 \[Rule] My + \@\(My\^2 - My\ y0 - My\ y2 + y0\ y2\)}}\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(Refine[Mx - \@\(Mx\^2 - Mx\ x0 - Mx\ x2 + x0\ x2\), 
      Mx \[Equal] 3 && x0 \[Equal] 0 && x2 \[Equal] 10]\)], "Input"],

Cell[BoxData[
    \(3 - \[ImaginaryI]\ \@21\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(Refine[\(\(-x1\^2\) + x0\ x2\)\/\(x0 - 2\ x1 + x2\), 
      x0 \[Equal] 0 && x2 \[Equal] 10]\)], "Input"],

Cell[BoxData[
    \(\(-\(x1\^2\/\(10 - 2\ x1\)\)\)\)], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
    \(eq = \((A\ x + B\ y)\)\^2 + C\ x + D\ y + E \[Equal] 0\)], "Input"],

Cell[BoxData[
    \(\[ExponentialE] + C\ x + D\ y + \((A\ x + B\ y)\)\^2 \[Equal] 
      0\)], "Output"]
}, Open  ]],

Cell[BoxData[{
    \(t = A\ x + B\ y\), "\[IndentingNewLine]", 
    \(t\^2 + D\ y - \(C\/A\) B\ y + E \[Equal] 0\), "\[IndentingNewLine]", 
    \(y = \(t\^2 + E\)\/\(\(C\/A\) B - D\)\), "\[IndentingNewLine]", 
    \(x = \(\(t - B\ y\)\/A = \(t - \(t\^2 + E\)\/\(C\/A - D\/B\)\)\/A\)\)}], \
"Input"],

Cell[CellGroupData[{

Cell[BoxData[
    \(Solve[eq, x]\)], "Input"],

Cell[BoxData[
    \({{x \[Rule] \(\(-C\) - 2\ A\ B\ y - \@\(C\^2 - 4\ A\^2\ \[ExponentialE] \
+ 4\ A\ B\ C\ y - 4\ A\^2\ D\ y\)\)\/\(2\ A\^2\)}, {x \[Rule] \(\(-C\) - 2\ A\
\ B\ y + \@\(C\^2 - 4\ A\^2\ \[ExponentialE] + 4\ A\ B\ C\ y - 4\ A\^2\ D\ \
y\)\)\/\(2\ A\^2\)}}\)], "Output"]
}, Open  ]],

Cell[BoxData[
    \(\(\(ParametricPlot\)\([\)\(t - 2\ y\)\)\)], "Input"]
},
FrontEndVersion->"5.0 for Microsoft Windows",
ScreenRectangle->{{0, 1440}, {0, 787}},
WindowSize->{1257, 666},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
Magnification->1.5
]

(*******************************************************************
Cached data follows.  If you edit this Notebook file directly, not
using Mathematica, you must remove the line containing CacheID at
the top of  the file.  The cache data will then be recreated when
you save this file from within Mathematica.
*******************************************************************)

(*CellTagsOutline
CellTagsIndex->{}
*)

(*CellTagsIndex
CellTagsIndex->{}
*)

(*NotebookFileOutline
Notebook[{

Cell[CellGroupData[{
Cell[1776, 53, 111, 2, 68, "Input"],
Cell[1890, 57, 45, 1, 41, "Output"],
Cell[1938, 60, 352, 5, 32, "Message"],
Cell[2293, 67, 69, 1, 41, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[2399, 73, 43, 1, 42, "Input"],
Cell[2445, 76, 40, 1, 41, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[2522, 82, 91, 2, 68, "Input"],
Cell[2616, 86, 63, 1, 41, "Output"],
Cell[2682, 89, 48, 1, 41, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[2767, 95, 315, 4, 42, "Input"],
Cell[3085, 101, 144, 2, 41, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[3266, 108, 65, 1, 42, "Input"],
Cell[3334, 111, 84, 1, 60, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[3455, 117, 90, 1, 42, "Input"],
Cell[3548, 120, 132, 2, 60, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[3717, 127, 81, 1, 42, "Input"],
Cell[3801, 130, 159, 2, 65, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[3997, 137, 111, 2, 68, "Input"],
Cell[4111, 141, 45, 1, 41, "Output"],
Cell[4159, 144, 40, 1, 41, "Output"]
}, Open  ]],
Cell[4214, 148, 26, 0, 42, "Input"],

Cell[CellGroupData[{
Cell[4265, 152, 261, 5, 120, "Input"],
Cell[4529, 159, 162, 3, 43, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[4728, 167, 159, 2, 43, "Input"],
Cell[4890, 171, 185, 3, 44, "Output"]
}, Open  ]],
Cell[5090, 177, 118, 2, 42, "Input"],

Cell[CellGroupData[{
Cell[5233, 183, 79, 1, 42, "Input"],
Cell[5315, 186, 26822, 358, 4922, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[32174, 549, 988, 21, 199, "Input"],
Cell[33165, 572, 102, 2, 41, "Output"],
Cell[33270, 576, 80, 1, 58, "Output"],
Cell[33353, 579, 356, 5, 32, "Message"],
Cell[33712, 586, 80, 1, 60, "Output"],
Cell[33795, 589, 128, 2, 65, "Output"],
Cell[33926, 593, 559, 8, 147, "Output"],
Cell[34488, 603, 559, 8, 147, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[35084, 616, 141, 2, 55, "Input"],
Cell[35228, 620, 57, 1, 44, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[35322, 626, 125, 2, 70, "Input"],
Cell[35450, 630, 64, 1, 63, "Output"]
}, Open  ]],

Cell[CellGroupData[{
Cell[35551, 636, 87, 1, 43, "Input"],
Cell[35641, 639, 104, 2, 43, "Output"]
}, Open  ]],
Cell[35760, 644, 298, 5, 254, "Input"],

Cell[CellGroupData[{
Cell[36083, 653, 45, 1, 42, "Input"],
Cell[36131, 656, 284, 4, 66, "Output"]
}, Open  ]],
Cell[36430, 663, 72, 1, 42, "Input"]
}
]
*)



(*******************************************************************
End of Mathematica Notebook file.
*******************************************************************)

